home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM 1995 Fall / PD-ROM F95.toast / Telecom / Internet / Internet A-M / MacHTTP 1.2.3 ƒ / map.script < prev    next >
Encoding:
Text File  |  1993-10-20  |  596 b   |  15 lines  |  [TEXT/ttxt]
  1. if http_search_args = "" then
  2.     return "<title>Map Test</title><isindex><A HREF=\"map.script\">" & ¬
  3.         "<IMG SRC=\"MacHTTP.gif\" ismap></A><P>Click on the tiny WWW document in the icon...<P>"
  4. else
  5.     set comma to offset of "," in http_search_args
  6.     set theLast to count http_search_args
  7.     set x to (text 1 thru (comma - 1) of http_search_args) + 0
  8.     set y to (text (comma + 1) thru theLast of http_search_args) + 0
  9. end if
  10. if x < 16 and y < 16 then
  11.     return "<title>Got Me</title> <h1>Got Me!</h1> x=" & x & " y=" & y
  12. else
  13.     return "<title>Missed Me</title> <h1>Missed Me!</h1> x=" & x & " y=" & y
  14. end if
  15.